﻿Public Class DocumentoClienteDetalle

    Dim _DCD_CIA, _DCD_SUC, _DCD_TDOC, _DCI_Codigo As String
    Dim _DCD_Codigo As Integer
    Dim _DCD_Fecha As Date
    Dim _ART_Codigo, _ALM_Codigo As String
    Dim _DCD_Ordenado, _DCD_Atendido, _DCD_Descuento As Double
    Dim _DCD_ValorUnit As Double
    Dim _DCD_UltModificacion As Date
    Dim _DCD_DCDCodigo As Integer
    Dim _DCD_DsctoAdicional, _DCD_ValorUnitSoles, _DCD_ValorUnitDolares As Double
    Dim _DCD_DsctoCond, _DCD_PorcPerc As Double
    Dim _DCD_FechasLlegada As Date
    Dim _DCD_Activo As String

    Sub New()

    End Sub

    Sub New(cia As String, suc As String, tdoc As String, dciCodigo As String, dcdCodigo As Integer, _
            dcdFecha As Date, artCodigo As String, almCodigo As String, dcdOrdenado As Double, dcdAtendido As Double, _
            dcdDescuento As Double, dcdValorUnitario As Double, dcdUltModificacion As Date, dcdDCDCodigo As Integer, _
            dsctoAdicional As Double, untSoles As Double, untDolares As Double, dsctoCond As Double, porPerc As Double, _
            fechaLlegada As Date, dcdActivo As String)
        Me._DCD_CIA = cia
        Me._DCD_SUC = suc
        Me._DCD_TDOC = tdoc
        Me._DCI_Codigo = dciCodigo
        Me._DCD_Codigo = dcdCodigo
        Me._DCD_Fecha = dcdFecha
        Me._ART_Codigo = artCodigo
        Me._ALM_Codigo = almCodigo
        Me._DCD_Ordenado = dcdOrdenado
        Me._DCD_Atendido = dcdAtendido
        Me._DCD_Descuento = dcdDescuento
        Me._DCD_ValorUnit = dcdValorUnitario
        Me._DCD_UltModificacion = dcdUltModificacion
        Me._DCD_DCDCodigo = dcdDCDCodigo
        Me._DCD_DsctoAdicional = dsctoAdicional
        Me._DCD_ValorUnitSoles = untSoles
        Me._DCD_ValorUnitDolares = untDolares
        Me._DCD_DsctoCond = dsctoCond
        Me._DCD_PorcPerc = porPerc
        Me._DCD_FechasLlegada = fechaLlegada
        Me._DCD_Activo = dcdActivo
    End Sub

    Public Property CIA() As String
        Get
            Return _DCD_CIA
        End Get
        Set(value As String)
            _DCD_CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _DCD_SUC
        End Get
        Set(value As String)
            _DCD_SUC = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _DCD_TDOC
        End Get
        Set(value As String)
            _DCD_TDOC = value
        End Set
    End Property

    Public Property DCI_Codigo() As String
        Get
            Return _DCI_Codigo
        End Get
        Set(value As String)
            _DCI_Codigo = value
        End Set
    End Property

    Public Property DCD_Codigo() As Integer
        Get
            Return _DCD_Codigo
        End Get
        Set(value As Integer)
            _DCD_Codigo = value
        End Set
    End Property

    Public Property DCD_Fecha() As Date
        Get
            Return _DCD_Fecha
        End Get
        Set(value As Date)
            _DCD_Fecha = value
        End Set
    End Property

    Public Property ART_Codigo() As String
        Get
            Return _ART_Codigo
        End Get
        Set(value As String)
            _ART_Codigo = value
        End Set
    End Property

    Public Property ALM_Codigo() As String
        Get
            Return _ALM_Codigo
        End Get
        Set(value As String)
            _ALM_Codigo = value
        End Set
    End Property

    Public Property DCD_Ordenado() As Double
        Get
            Return _DCD_Ordenado
        End Get
        Set(value As Double)
            _DCD_Ordenado = value
        End Set
    End Property

    Public Property DCD_Atendido() As Double
        Get
            Return _DCD_Atendido
        End Get
        Set(value As Double)
            _DCD_Atendido = value
        End Set
    End Property

    Public Property DCD_Descuento() As Double
        Get
            Return _DCD_Descuento
        End Get
        Set(value As Double)
            _DCD_Descuento = value
        End Set
    End Property

    Public Property DCD_ValorUnit() As Double
        Get
            Return _DCD_ValorUnit
        End Get
        Set(value As Double)
            _DCD_ValorUnit = value
        End Set
    End Property

    Public Property DCD_UltModificacion() As Date
        Get
            Return _DCD_UltModificacion
        End Get
        Set(value As Date)
            _DCD_UltModificacion = value
        End Set
    End Property

    Public Property DCD_DCDCodigo() As Integer
        Get
            Return _DCD_DCDCodigo
        End Get
        Set(value As Integer)
            _DCD_DCDCodigo = value
        End Set
    End Property

    Public Property DCD_DsctoAdicional() As Double
        Get
            Return _DCD_DsctoAdicional
        End Get
        Set(value As Double)
            _DCD_DsctoAdicional = value
        End Set
    End Property

    Public Property DCD_ValorUnitSoles() As Double
        Get
            Return _DCD_ValorUnitSoles
        End Get
        Set(value As Double)
            _DCD_ValorUnitSoles = value
        End Set
    End Property

    Public Property DCD_ValorUnitDolares() As Double
        Get
            Return _DCD_ValorUnitDolares
        End Get
        Set(value As Double)
            _DCD_ValorUnitDolares = value
        End Set
    End Property

    Public Property DCD_DsctoCond() As Double
        Get
            Return _DCD_DsctoCond
        End Get
        Set(value As Double)
            _DCD_DsctoCond = value
        End Set
    End Property

    Public Property DCD_PorcPerc() As Double
        Get
            Return _DCD_PorcPerc
        End Get
        Set(value As Double)
            _DCD_PorcPerc = value
        End Set
    End Property

    Public Property DCD_FechasLlegada() As Date
        Get
            Return _DCD_FechasLlegada
        End Get
        Set(value As Date)
            _DCD_FechasLlegada = value
        End Set
    End Property

    Public Property DCD_Activo() As String
        Get
            Return _DCD_Activo
        End Get
        Set(value As String)
            _DCD_Activo = value
        End Set
    End Property

End Class
